home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2006 December / PCWDEC06.iso / Software / Trial / Paint Shop Pro XI / Data1.cab / _709E2D04C0FF4269BDEACDE17D56C296 < prev    next >
Encoding:
Text File  |  2006-08-04  |  1.7 KB  |  57 lines

  1. from PSPApp import *
  2.  
  3. def ScriptProperties():
  4.     return {
  5.         'Author': u'Corel Corporation',
  6.         'Copyright': u'Copyright (c) 2003-2004 Corel Corporation  All rights reserved.',
  7.         'Description': u'',
  8.         'Host': u'Paint Shop Pro',
  9.         'Host Version': u'8.10'
  10.         }
  11.  
  12. def Preset_MagnifyingLens():
  13.     return {
  14.         'Darkness': 0, 
  15.         'Defocus': 0, 
  16.         'Frame': {
  17.             'FrameColor': (0,0,255), 
  18.             'Material': App.Constants.LensFrameMaterial.ShinyBluePlastic, 
  19.             'Style': App.Constants.LensFrameShape.RoundedSquare, 
  20.             'Thickness': 6
  21.             }, 
  22.         'Illumination': {
  23.             'LightList': [{
  24.                 'LightColor': (255,255,255), 
  25.                 'LightDirection': (1,1,-1), 
  26.                 'HighlightSize': 20
  27.                 }], 
  28.             'MaxAmbience': 50, 
  29.             'MinAmbience': 0
  30.             }, 
  31.         'LensSurface': {
  32.             'EnvironmentMap': {
  33.                 'Active': App.Constants.Boolean.false, 
  34.                 'MapType': App.Constants.LensMapType.CurrentImage, 
  35.                 'FileName': u'', 
  36.                 'PatternOpacity': 50
  37.                 }, 
  38.             'Gloss': 0, 
  39.             'Magnification': 90, 
  40.             'LensMaterial': {
  41.                 'Color': (0,0,0), 
  42.                 'Pattern': None, 
  43.                 'Gradient': None, 
  44.                 'Texture': None
  45.                 }, 
  46.             'LensOpacity': 10, 
  47.             'Refraction': 30, 
  48.             'ShapeType': App.Constants.LensShape.Spherical, 
  49.             'Shininess': 50
  50.             }
  51.         }
  52.  
  53. def Do(Environment):
  54.     # Magnifying Lens
  55.     App.Do( Environment, 'MagnifyingLens',         Preset_MagnifyingLens())
  56.  
  57.